home *** CD-ROM | disk | FTP | other *** search
/ CyberMycha 2003 May / cmycha200305.iso / MutantStorm / setup_mutantstorm_demo.exe / {app} / script / player_all.lua < prev    next >
Text File  |  2002-10-22  |  4KB  |  130 lines
  1.  
  2. dofile("powerup_3way.lua")
  3. dofile("powerup_laser.lua")
  4. dofile("powerup_missile.lua")
  5. dofile("powerup_shield.lua")
  6. dofile("powerup_spinner.lua")
  7. dofile("powerup_extralife.lua")
  8.  
  9. function player_add_bullet( actor_name, model_name, rate, sound )
  10.     bullet_actor_name = actor_name
  11.     bullet_model_name = model_name
  12.     bullet_rate = rate
  13.     bullet_sound = sound
  14.     dofile("player_bullet_1.lua")
  15. end
  16.  
  17. function player_add_player( use_player )
  18.     dofile_lua( use_player )
  19.  
  20.     local seq = { 0.0, 0.1, 0.2, 0.4, 0.9 }
  21.     c_set_use_explosion_for( "bye_bye", "player-dead", exp_no_align, 100.0, 0.0, 1500.0, 1800.0, seq )
  22.     local seq = { 0.15, 0.25, 0.35, 0.55, 1.05 }
  23.     c_set_use_explosion_for( "bye_bye", "player-dead", exp_no_align, 300.0, 0.0, 1000.0, 1200.0, seq )
  24.     c_add_sound_to_explosion( "player-dead", "explode", "player-dead" )
  25.     local seq = { 0.0, 0.1, 0.3 }
  26.     c_set_use_explosion_for( "smart_bomb", "mine-shockwave", exp_no_align, 0.0, -0.9, 4500.0, 4500.0, seq )
  27.     c_add_particle_to_explosion( "mine-shockwave", "explode", "", "mineshitter-mineexp" )
  28.     c_add_sound_to_explosion( "mine-shockwave", "explode", "mine-exp" )
  29.  
  30.     local seq = { 0.0, 0.1, 0.2, 0.4, 0.9 }
  31.     c_set_use_explosion_for( "bonus_extra", "flash-1", exp_no_align, 1500.0, 0.0, 3000.0, 6000.0, seq )
  32.     local seq = { 0.01, 0.11, 0.21, 0.41, 0.91 }
  33.     c_set_use_explosion_for( "bonus_extra", "flash-1", exp_no_align, 1500.0, 0.0, 3000.0, 6000.0, seq )
  34.     local seq = { 0.15, 0.25, 0.35, 0.55, 1.05 }
  35.     c_set_use_explosion_for( "bonus_extra", "flash-1", exp_no_align, 1500.0, 0.0, 3000.0, 6000.0, seq )
  36.     local seq = { 0.16, 0.26, 0.36, 0.56, 1.06 }
  37.     c_set_use_explosion_for( "bonus_extra", "flash-1", exp_no_align, 1500.0, 0.0, 3000.0, 6000.0, seq )
  38.     local seq = { 0.25, 0.45, 0.75, 1.45, 1.65 }
  39.     c_set_use_explosion_for( "bonus_extra", "flash-1", exp_no_align, 1000.0, 0.0, 3000.0, 6000.0, seq )
  40.     local seq = { 0.26, 0.46, 0.76, 1.46, 1.66 }
  41.     c_set_use_explosion_for( "bonus_extra", "flash-1", exp_no_align, 1000.0, 0.0, 3000.0, 6000.0, seq )
  42.  
  43.     c_add_particle_to_explosion( "flash-1", "explode", "", "player-flash" )
  44.  
  45.     c_set_use_explosion_for( "multiply_extra", "flash-multi", exp_no_align, 0.0, 0.0, 7000.0, 7000.0, {0.0} )
  46.     c_add_particle_to_explosion( "flash-multi", "explode", "", "multi-shockwave" )
  47. end
  48.  
  49. function player_start( posx, posy, posz )
  50.  
  51.     local player_choose_2 = c_get_player_num( 2 )
  52.     local player_choose = c_get_player_num( 1 )
  53.     if player_choose > 5 then
  54.         player_choose = 5
  55.     end
  56.  
  57.     local bullet_type = "bullet1"
  58.     if player_choose == 5 then
  59.         bullet_type = "bullet2"
  60.     elseif player_choose == 4 then
  61.         bullet_type = "bullet3"
  62.     end
  63.     if player_choose_2 > 0 then
  64.         bullet_type = format( "%s-mp", bullet_type )
  65.     end
  66.  
  67.     -- main bullet
  68.     player_add_bullet( "player_bullet_1", bullet_type, 0.05, "playerfire_1" )
  69.     -- 3 way
  70.     player_add_bullet( "player_bullet_2", "bullet-3way", 0.070, "playerfire_2" )
  71.     -- laser
  72.     player_add_bullet( "player_bullet_3", "bullet-laser", 0.075, "playerfire_3" )
  73.     -- missile
  74.     dofile("player_missile_1.lua")
  75.  
  76.     -- shield
  77.     dofile("player_shield.lua")
  78.     -- spinner
  79.     dofile("player_spinner.lua")
  80.  
  81.     local use_player = format( "player_%d", player_choose )
  82.     player_add_player( use_player )
  83.  
  84.     local apo = ACTOR_PreLaunch( use_player )
  85.     if player_choose_2 > 0 then
  86.         posx = posx - 4.0
  87.     end
  88.     apo:setposn( posy, posz, -posx )
  89.     apo:launch()
  90.  
  91.     -- player 2
  92.     player_choose = c_get_player_num( 2 )
  93.     if player_choose > 0 then
  94.         if player_choose > 5 then
  95.             player_choose = 5
  96.         end
  97.  
  98.         bullet_type = "bullet1-mp"
  99.         if player_choose == 5 then
  100.             bullet_type = "bullet2-mp"
  101.         elseif player_choose == 4 then
  102.             bullet_type = "bullet3-mp"
  103.         end
  104.  
  105.         -- main bullet
  106.         player_add_bullet( "player2_bullet_1", bullet_type, 0.05, "playerfire_1" )
  107.  
  108.         use_player = format( "player_%d", player_choose )
  109.         player_add_player( use_player )
  110.  
  111.         apo = ACTOR_PreLaunch( use_player )
  112.         posx = posx + 8.0
  113.         apo:setposn( posy, posz, -posx )
  114.         apo:launch()
  115.     end
  116.  
  117.     if cur_level_num == 100 then
  118.         for t = 1,5,1 do
  119.             use_player = format( "player_%d", t )
  120.             player_add_player( use_player )
  121.         end
  122.         for t = 1,3,1 do
  123.             bullet_type = format( "bullet%d", t )
  124.             player_add_bullet( bullet_type, bullet_type, 0.05, "playerfire_1" )
  125.             bullet_type = format( "bullet%d-mp", t )
  126.             player_add_bullet( bullet_type, bullet_type, 0.05, "playerfire_1" )
  127.         end
  128.     end
  129. end
  130.